Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue59/Arch/Extended Sample/UnitFormEntityOrders.dfm

Text File | 2000-05-19 | 8.8 KB | 431 lines

inherited FormEntityOrders: TFormEntityOrders
  Left = 792
  Top = 231
  Caption = 'FormEntityOrders'
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 16
    Top = 40
    Width = 40
    Height = 13
    Caption = 'OrderNo'
    FocusControl = DBEdit1
  end
  object Label2: TLabel [1]
    Left = 16
    Top = 84
    Width = 35
    Height = 13
    Caption = 'CustNo'
    FocusControl = DBEdit2
  end
  object Label3: TLabel [2]
    Left = 16
    Top = 128
    Width = 44
    Height = 13
    Caption = 'SaleDate'
    FocusControl = DBEdit3
  end
  object Label4: TLabel [3]
    Left = 16
    Top = 172
    Width = 44
    Height = 13
    Caption = 'ShipDate'
    FocusControl = DBEdit4
  end
  object Label5: TLabel [4]
    Left = 16
    Top = 216
    Width = 35
    Height = 13
    Caption = 'EmpNo'
    FocusControl = DBEdit5
  end
  object Label6: TLabel [5]
    Left = 188
    Top = 40
    Width = 71
    Height = 13
    Caption = 'ShipToContact'
    FocusControl = DBEdit6
  end
  object Label7: TLabel [6]
    Left = 188
    Top = 84
    Width = 62
    Height = 13
    Caption = 'ShipToAddr1'
    FocusControl = DBEdit7
  end
  object Label8: TLabel [7]
    Left = 188
    Top = 128
    Width = 62
    Height = 13
    Caption = 'ShipToAddr2'
    FocusControl = DBEdit8
  end
  object Label9: TLabel [8]
    Left = 188
    Top = 172
    Width = 51
    Height = 13
    Caption = 'ShipToCity'
    FocusControl = DBEdit9
  end
  object Label10: TLabel [9]
    Left = 188
    Top = 216
    Width = 59
    Height = 13
    Caption = 'ShipToState'
    FocusControl = DBEdit10
  end
  object Label11: TLabel [10]
    Left = 188
    Top = 260
    Width = 49
    Height = 13
    Caption = 'ShipToZip'
    FocusControl = DBEdit11
  end
  object Label12: TLabel [11]
    Left = 188
    Top = 304
    Width = 70
    Height = 13
    Caption = 'ShipToCountry'
    FocusControl = DBEdit12
  end
  object Label13: TLabel [12]
    Left = 404
    Top = 40
    Width = 65
    Height = 13
    Caption = 'ShipToPhone'
    FocusControl = DBEdit13
  end
  object Label14: TLabel [13]
    Left = 404
    Top = 84
    Width = 38
    Height = 13
    Caption = 'ShipVIA'
    FocusControl = DBEdit14
  end
  object Label15: TLabel [14]
    Left = 404
    Top = 128
    Width = 15
    Height = 13
    Caption = 'PO'
    FocusControl = DBEdit15
  end
  object Label16: TLabel [15]
    Left = 404
    Top = 172
    Width = 29
    Height = 13
    Caption = 'Terms'
    FocusControl = DBEdit16
  end
  object Label17: TLabel [16]
    Left = 404
    Top = 216
    Width = 77
    Height = 13
    Caption = 'PaymentMethod'
    FocusControl = DBEdit17
  end
  object Label18: TLabel [17]
    Left = 404
    Top = 260
    Width = 49
    Height = 13
    Caption = 'ItemsTotal'
    FocusControl = DBEdit18
  end
  object Label19: TLabel [18]
    Left = 404
    Top = 304
    Width = 41
    Height = 13
    Caption = 'TaxRate'
    FocusControl = DBEdit19
  end
  object Label20: TLabel [19]
    Left = 404
    Top = 348
    Width = 32
    Height = 13
    Caption = 'Freight'
    FocusControl = DBEdit20
  end
  object Label21: TLabel [20]
    Left = 404
    Top = 392
    Width = 57
    Height = 13
    Caption = 'AmountPaid'
    FocusControl = DBEdit21
  end
  object DBText1: TDBText [21]
    Left = 64
    Top = 408
    Width = 153
    Height = 17
    Cursor = crHandPoint
    Hint = 'Hyperlink to the associated customer'
    Color = clBtnFace
    DataField = 'Company'
    DataSource = DataSourceCustomer
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsUnderline]
    ParentColor = False
    ParentFont = False
    OnClick = DBText1Click
  end
  object Label22: TLabel [22]
    Left = 12
    Top = 408
    Width = 47
    Height = 13
    Caption = 'Customer:'
  end
  object DBEdit1: TDBEdit [25]
    Left = 16
    Top = 56
    Width = 64
    Height = 21
    Hint = 'Order number'
    DataField = 'OrderNo'
    DataSource = DataSourceOrders
    TabOrder = 2
  end
  object DBEdit2: TDBEdit [26]
    Left = 16
    Top = 100
    Width = 64
    Height = 21
    Hint = 'Associated customer number'
    DataField = 'CustNo'
    DataSource = DataSourceOrders
    TabOrder = 3
  end
  object DBEdit3: TDBEdit [27]
    Left = 16
    Top = 144
    Width = 112
    Height = 21
    Hint = 'Date of sale'
    DataField = 'SaleDate'
    DataSource = DataSourceOrders
    TabOrder = 4
  end
  object DBEdit4: TDBEdit [28]
    Left = 16
    Top = 188
    Width = 112
    Height = 21
    Hint = 'Ship date'
    DataField = 'ShipDate'
    DataSource = DataSourceOrders
    TabOrder = 5
  end
  object DBEdit5: TDBEdit [29]
    Left = 16
    Top = 232
    Width = 64
    Height = 21
    Hint = 'Associated employee'
    DataField = 'EmpNo'
    DataSource = DataSourceOrders
    TabOrder = 6
  end
  object DBEdit6: TDBEdit [30]
    Left = 188
    Top = 56
    Width = 124
    Height = 21
    Hint = 'Ship-to contact name'
    DataField = 'ShipToContact'
    DataSource = DataSourceOrders
    TabOrder = 7
  end
  object DBEdit7: TDBEdit [31]
    Left = 188
    Top = 100
    Width = 184
    Height = 21
    Hint = 'Ship-to address line one'
    DataField = 'ShipToAddr1'
    DataSource = DataSourceOrders
    TabOrder = 8
  end
  object DBEdit8: TDBEdit [32]
    Left = 188
    Top = 144
    Width = 184
    Height = 21
    Hint = 'Ship-to address line two'
    DataField = 'ShipToAddr2'
    DataSource = DataSourceOrders
    TabOrder = 9
  end
  object DBEdit9: TDBEdit [33]
    Left = 188
    Top = 188
    Width = 94
    Height = 21
    Hint = 'Ship-to city'
    DataField = 'ShipToCity'
    DataSource = DataSourceOrders
    TabOrder = 10
  end
  object DBEdit10: TDBEdit [34]
    Left = 188
    Top = 232
    Width = 124
    Height = 21
    Hint = 'Ship-to state'
    DataField = 'ShipToState'
    DataSource = DataSourceOrders
    TabOrder = 11
  end
  object DBEdit11: TDBEdit [35]
    Left = 188
    Top = 276
    Width = 64
    Height = 21
    Hint = 'Ship-to ZIP code'
    DataField = 'ShipToZip'
    DataSource = DataSourceOrders
    TabOrder = 12
  end
  object DBEdit12: TDBEdit [36]
    Left = 188
    Top = 320
    Width = 124
    Height = 21
    Hint = 'Ship-to country'
    DataField = 'ShipToCountry'
    DataSource = DataSourceOrders
    TabOrder = 13
  end
  object DBEdit13: TDBEdit [37]
    Left = 404
    Top = 56
    Width = 94
    Height = 21
    Hint = 'Ship-to telephone number'
    DataField = 'ShipToPhone'
    DataSource = DataSourceOrders
    TabOrder = 14
  end
  object DBEdit14: TDBEdit [38]
    Left = 404
    Top = 100
    Width = 46
    Height = 21
    Hint = 'Ship-to carrier'
    DataField = 'ShipVIA'
    DataSource = DataSourceOrders
    TabOrder = 15
  end
  object DBEdit15: TDBEdit [39]
    Left = 404
    Top = 144
    Width = 94
    Height = 21
    Hint = 'Ship-to post office box number'
    DataField = 'PO'
    DataSource = DataSourceOrders
    TabOrder = 16
  end
  object DBEdit16: TDBEdit [40]
    Left = 404
    Top = 188
    Width = 40
    Height = 21
    Hint = 'Ship-to terms'
    DataField = 'Terms'
    DataSource = DataSourceOrders
    TabOrder = 17
  end
  object DBEdit17: TDBEdit [41]
    Left = 404
    Top = 232
    Width = 46
    Height = 21
    Hint = 'Ship-to payment method'
    DataField = 'PaymentMethod'
    DataSource = DataSourceOrders
    TabOrder = 18
  end
  object DBEdit18: TDBEdit [42]
    Left = 404
    Top = 276
    Width = 64
    Height = 21
    Hint = 'Ship-to item count'
    DataField = 'ItemsTotal'
    DataSource = DataSourceOrders
    TabOrder = 19
  end
  object DBEdit19: TDBEdit [43]
    Left = 404
    Top = 320
    Width = 64
    Height = 21
    Hint = 'Ship-to tax rate'
    DataField = 'TaxRate'
    DataSource = DataSourceOrders
    TabOrder = 20
  end
  object DBEdit20: TDBEdit [44]
    Left = 404
    Top = 364
    Width = 64
    Height = 21
    Hint = 'Ship-to freight charge'
    DataField = 'Freight'
    DataSource = DataSourceOrders
    TabOrder = 21
  end
  object DBEdit21: TDBEdit [45]
    Left = 404
    Top = 408
    Width = 64
    Height = 21
    Hint = 'Ship-to amount paid'
    DataField = 'AmountPaid'
    DataSource = DataSourceOrders
    TabOrder = 22
  end
  inherited ImageListBase: TImageList
    Top = 65528
  end
  inherited ActionListEntity: TActionList
    Left = 116
    Top = 65532
  end
  inherited PopupMenuEntity: TPopupMenu
    Left = 160
    Top = 65528
  end
  object DataSourceOrders: TDataSource
    Left = 48
    Top = 284
  end
  object DataSourceCustomer: TDataSource
    Left = 48
    Top = 348
  end
end